image width

Otázka od: Peter Surovy

30. 10. 2002 17:44

Ahoj

chcem zmenit velkost komponenty
Image pocas runtime ale jaksi to nefunguje:

  Image1.Width:=(Image1.Width)*2;
  Image1.Height:=(Image1.Height)*2;
  Label1.caption:=IntToStr(Image1.Width)+' , '+IntToStr(Image1.Height);

vypise zvacsene hodnoty ale plocha na ktoru sa kresli
zostane nezmenena... akoby Canvas zostal rovnako
velky

treba ho nejako nanovo nainicializovat?

PS

Odpovedá: Karel Dušek

31. 10. 2002 6:38

Koukni jestli nemas zapnuty AutoSize.

Karel

----- Original Message -----
From: "Peter Surovy" <psurovy@uevora.pt>
To: <delphi-l@clexpert.cz>
Sent: Wednesday, October 30, 2002 4:51 PM
Subject: image width

> Ahoj
>
> chcem zmenit velkost komponenty
> Image pocas runtime ale jaksi to nefunguje:
>
> Image1.Width:=(Image1.Width)*2;
> Image1.Height:=(Image1.Height)*2;
> Label1.caption:=IntToStr(Image1.Width)+' , '+IntToStr(Image1.Height);
>
> vypise zvacsene hodnoty ale plocha na ktoru sa kresli
> zostane nezmenena... akoby Canvas zostal rovnako
> velky treba ho nejako nanovo nainicializovat?
>
> PS
>

Odpovedá: Vaclav Sazima

31. 10. 2002 11:36

Peter Surovy wrote:
> Ahoj
>
> chcem zmenit velkost komponenty
> Image pocas runtime ale jaksi to nefunguje:
>
> Image1.Width:=(Image1.Width)*2;
> Image1.Height:=(Image1.Height)*2;
     Image1.Picture.Bitmap.Width := Image1.Width;
     Image1.Picture.Bitmap.Height := Image1.Height;
> Label1.caption:=IntToStr(Image1.Width)+' , '+IntToStr(Image1.Height);
>
> vypise zvacsene hodnoty ale plocha na ktoru sa kresli
> zostane nezmenena... akoby Canvas zostal rovnako
> velky treba ho nejako nanovo nainicializovat?

  Vaclav Sazima